(use ./common ./netfunc)

(def ttt-cfg {:host "127.0.0.1" :port 4055 :me ["green" :x] :foe ["red" :o] })



(defn client-render ([mecolor mechar] [foecolor foechar] statemap)
  )
(defn client-parse (str)

  )
(defn client ({:host host :port port :me me :foe foe})
  (def result (netcall host port ) )
  )


(defn server ({:host host :port port})
  )
(prin "Run as client? [Y/n] ")
(def run (if (string/find (:read stdin :line) "clientClientCLIENTyesYesYES") client server))
(run ttt-cfg)
